# name : macro loop through param's value (list by ,)
# key : macro.loop.through.list
# contributor: Shuguang Sun
# --
%do i = 1 %to %qsysfunc(countw(&${1:param}., %str((,))));
  %let _$1_val = %unquote(%qscan(&$1., &i., %str((,))));
  %put &=i *&=_$1_val*;

  $0
  %end;
